home *** CD-ROM | disk | FTP | other *** search
/ LOGIC Apps / Logic-APPLE_II_APPS.iso / mac / LOGIC Apple II 5.25" Library - ProDOS / PRO035.dsk / STARTUP.bas < prev    next >
BASIC Source File  |  2012-02-16  |  992b  |  17 lines
  1. 10  HOME 
  2. 15  SPEED= 175
  3. 20  PRINT "_______________________________________"
  4. 22  PRINT : PRINT "International Apple Core": PRINT "P.O. Box 880338": PRINT "San Francisco, CA 94188-0338": PRINT "(415) 863-7412 - 9:00am-5:00pm PST": PRINT "                 Monday - Friday"
  5. 23  PRINT : PRINT "     INTERNATIONAL APPLE CORE'S"
  6. 24  PRINT "     Reverse Polish Notation Calculator": PRINT "     Disk Of the Month (#68)": PRINT "     February, 1987"
  7. 26  PRINT "_______________________________________"
  8. 28  SPEED= 255: FOR I = 1 TO 1000: NEXT 
  9. 30  PRINT : PRINT "   This program is SHAREWARE developed  by Glen Bredon."
  10. 32  PRINT "   If you find this program useful,": PRINT "please send a $20 donation to:"
  11. 34  PRINT "   Glen Bredon": PRINT "   21 State Rd.": PRINT "   Princeton, NJ 08540"
  12. 90  VTAB 23: HTAB 1: INVERSE : PRINT "[ HIT RETURN TO CONTINUE, ^C TO BREAK ]";: NORMAL : GET A$
  13. 92  IF A$ =  CHR$(13)  THEN 98
  14. 93  IF A$ =  CHR$(3)  THEN 99
  15. 95  GOTO 90
  16. 98  PRINT  CHR$(4);"-RPN.CALC"
  17. 99  END